object UretimAcilimiF: TUretimAcilimiF
  Left = 137
  Top = 191
  BorderStyle = bsSingle
  Caption = #220'retim A'#231#305'l'#305'm'#305
  ClientHeight = 316
  ClientWidth = 1061
  Color = clBtnFace
  Font.Charset = TURKISH_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'Arial'
  Font.Style = []
  KeyPreview = True
  OldCreateOrder = False
  Position = poMainFormCenter
  OnClose = FormClose
  OnKeyPress = FormKeyPress
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 14
  object wwDBGrid1: TwwDBGrid
    Left = 0
    Top = 0
    Width = 1061
    Height = 316
    DisableThemes = False
    Selected.Strings = (
      'durum'#9'5'#9'Durum'#9'F'
      'tarih'#9'10'#9'Tarih'#9'F'
      'makinano'#9'12'#9'Makine No'#9'F'
      'stokkodu'#9'20'#9'Model'#9'F'
      'montajhazirlayan'#9'10'#9'M.Okutan'#9'F'
      'perkod'#9'10'#9'Montajc'#305#9'F'
      'testt'#9'18'#9'Test Tarihi'#9'F'
      'sontariht'#9'18'#9'Son Kontrol Tarihi'#9'F'
      'paktar'#9'18'#9'Paket Tarihi'#9'F'
      'MerkezTar'#9'18'#9'Merkez Tarihi'#9'F'
      'carikodu'#9'20'#9'Cari Kodu'#9'F')
    IniAttributes.Delimiter = ';;'
    TitleColor = clBtnFace
    FixedCols = 0
    ShowHorzScrollBar = True
    Align = alClient
    DataSource = AcilimS
    KeyOptions = [dgEnterToTab]
    Options = [dgEditing, dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgAlwaysShowSelection, dgConfirmDelete, dgCancelOnExit, dgWordWrap]
    PopupMenu = ExportMenu1
    TabOrder = 0
    TitleAlignment = taLeftJustify
    TitleFont.Charset = TURKISH_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -11
    TitleFont.Name = 'Arial'
    TitleFont.Style = []
    TitleLines = 1
    TitleButtons = False
    UseTFields = False
    OnDblClick = wwDBGrid1DblClick
  end
  object Acilim: TADOQuery
    Connection = dm.connect
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      
        'select top 1 stokkodu=(select stokkodu from uremri where uremri.' +
        'emirno=uretim.uretimno),carikodu=(select dbo.getcarikodu(carikod' +
        ') from fatura where fatura.bilisno=(select bilisnocik from fatha' +
        'rhar where fatharhar.serinos=uretim.makinano)),* from uretim '
      'where uretimno='#39'19291'#39)
    Left = 416
    Top = 72
  end
  object AcilimS: TDataSource
    DataSet = Acilim
    Left = 368
    Top = 72
  end
  object ExportMenu1: TPopupMenu
    Left = 336
    Top = 136
    object Export1: TMenuItem
      Caption = 'Export'
      OnClick = Export1Click
    end
  end
end
